; Set up assigns etc. both for users booting from the CD and from HD
;
; Version 1.1 - Changed jpegtmp
;
; Version 1.2 - Added uninit option
;
If $CDInit EQ TRUE
If $CDBoot EQ TRUE ; don't run UninitCD if booted from CD
echo "*NYou do not need to run InitCD when you have booted from the CD"
Quit
EndIf
set remass `RequestChoice "InitCD" "You have already run InitCD once.*NDo you wish to remove the assigns and paths added before?" "Remove|Cancel"`
If $remass EQ 1
execute UnInitCD
EndIf
Quit
EndIf
Assign CUCD: :
; Set these assigns and paths only if not booting from CD
IF $CDBoot NOT EQ TRUE
Run >NIL: RequestChoice "InitCD" "Setting up some assigns and paths to run software from the CD.*NIf you wish to remove the CD from the drive, run InitCD again,*Notherwise the icon will stay on the Workbench." " OK "